000100 01 ADD-CUSTOMER-SCREEN.
000200	05 BLANK-SCREEN.
000210	05 LINE 1 COL 1
000220	   ERASE EOL
000230	   FOREGROUND-COLOR 7 HIGHLIGHT
000240	   BACKGROUND-COLOR 1 LOWLIGHT
000250	   VALUE "".
000300	05 LINE 1 COL 1
000301     FOREGROUND-COLOR 7 HIGHLIGHT
000302	   BACKGROUND-COLOR 1 LOWLIGHT
000303	   VALUE "PMD".
000400	05 LINE 1 COL 30
000401	   FOREGROUND-COLOR 7 HIGHLIGHT
000402	   BACKGROUND-COLOR 1 LOWLIGHT
000403     VALUE "ADD CUSTOMER RECORD".
000450  05 LINE 1 COL 63
000451	   FOREGROUND-COLOR 7 HIGHLIGHT
000452	   BACKGROUND-COLOR 1 LOWLIGHT
000453     VALUE "CUSTOMER #:".
000500	05 LINE 1 COL 76
000501     FOREGROUND-COLOR 7 HIGHLIGHT
000502	   BACKGROUND-COLOR 1 LOWLIGHT
000503     PIC 9(5) FROM PROJECT-NUMBER.
